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We are very pleased to o^-Fer the 
article that -follows. Dr. Szymkiewicz 
is very skilled in computer hardware 
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AddinQ a Numerical Keypad 

to the 99/4A 

by Steven Szymkiewicz, MD 
Clairton, PA 

STANDARD: lA 

One of the deficiencies in the 
TI-99/4A console, when compared to 
more expensive computers, is the lack 
of a separate special function and 
numerical keypad for quick data input. 
Th is 1 ack can easi 1 y be corrected 
without special software by connecting 
a keypad i n tandem wi th the keyboard . 
The cost can be kept within the $10 to 
*1S range, and the project entails a 
minimum of soldering- 



The materials used in the project 
and their costs ^r^ in Table 1 . These 
were obtained from Jameco Electronics^ 
and Radio Shack also carri es them 
except for the keypads. Any SPST 
mechanical switch keyboard can be used 
for the keypad in this project. 

The first step in connecting an 
additional keypad is to bring the 
keyboard 1 ines outside of the console. 
Doing so, of course, wi 1 1 void the 
computer' s warranty (if yours is sti 1 1 
valid). If that is no obstacle^ then 
turn the computer of f , unplug al 1 
electrical connections, and flip it 
over. Remove the seven screws in the 
console bottom and lift the bottom off 
< in older versions, the on— of f switch 
wi 1 1 have to be pul led out f irst > . 
Inside, the computer is di vi ded into a 
keyboard 9 a power supply and a main 
logic board- The easiest pi ace to 
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connect lines -for a tandem keypad is 
where the keyboard lines plug into the 
main logic board. For better access, 
remove the logic board by unscrewing 
the retaining screws near the I/O 
port, the joystick port, and the 
center of the back part. Unplug the 
keyboard and the power supply be-fore 
li-fting it out. 

Fi-fteen posts rise -from the logic 
board where the keyboard connects to 
it- Note that the posts are numbered. 
Strip a small amount of insi'lation 
from each wire of the 15 wire ribbon 
and wrap a wire tightly to each post- 
Carefully solder these attachments. 
Remember the consol e keyboard must 
plug back In, so keep the placement as 
low on the posts as possible. Trim 
off any excess solder and/or wire 
strands to avoid the possibility of an 
unwanted line to line contact. Next, 
connect the power supply and keyboard, 
and replace and secure the logic board 
inside the console. 

The wire ribbon can be brought 
directly out through the ventilation 
area on the bottom. Since stress will 
then occur on the logic board if the 
ribbon is tugged, a better solution is 
to attach the ribbon wire to the 
console. Remove a portion of a bar in 
the ventilation area of the console's 
bottom and file It large enough to 
accomodate one of the 16 pin DIP 
sockets. Then glue a scrap piece of 
perfboard over the gap and install the 
DIP socket. The socket should be just 
about flush with the console. Solder 
the ribbon wires to the socket pins. 
Using the numbering from the posts of 
the logic board, keep track of which 
wire is connected to which socket pin 
(write it down!). The console can be 
reassembled as no further modification 
is needed . Now 1 f the keypad i s 
dropped, the stress will be on the 
socket and not the logic board. 

The ALPS keyboard needs 
modification before use, as only the 
center portion is needed (a smaller 
keypad is less clumsy). Desolder and 
remove all the keyswitches, then 
desolder and remove the sliding 
switches. Using a hacksaw, cut along 



the holes to the left of where the 
large zero key was and to the right of 
where the large plus key was. Cut 
both the metal frame and the etched 
board. The alternative keypad listed 
in Table 1 will not need the above 
changes, but it is more expensive. 

At this point, the enclosure 
should be prepared. The back of the 
enclosure will need an opening for the 

ond DIP socket and a hole on each 
Ide for a nut and bolt to hold the 

ond piece of perfboard to it. The 
top of the enclosure needs an opening 
for the keys to come through and two 
holes on each side to attach the 
keypad- For the ALPS board, cut a 
2 7/8" X 4" opening for the keys and 
drill the holes about 1/4" from the 
opening. When drilling the holes, 
drill through the metal frame at the 
same time to ensure that they will 
line up. Then cut out the socket 
opening and drill holes for the bolts. 
Next, attach the second DIP socket to 
the second piece of perfboard and bolt 
the perfboard to the back of the 
enclosure. Then bolt the metal frame 
to the enclosure top, replace the 
keys, and resolder the keys to the 
pads on the etched board. 

The TI uses a 7 x 8 matrix for 
keyboard encoding. The connection of 
a row to a column line allows the 
computer to determine which key was 
pressed. The matrix Is shown in Table 
2. The line numbers in the table 
match the line numbers within the 
computer. The ALPS keyboard does not 
follow TI's convention, so the etched 
lines must be cut from the keyswltch 
pads. Make new connections following 
TI's convention using bell wire, and 
attach the appropriate lines to the 
second DIP socket pins. Make sure the 
1 i ne numbers from both DIP sockets 
match or the keypad will not function 
as expected. Table 3 has a useful 
wi r i ng arrangement , al though others 
can be used. 

Essentially, that is it. Use the 
DIP jumper cable to connect It to the 
console and try it out. If characters 
appear when no key i s pressed , there 
is a short somewhere. If the wrong 
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characters appear, the lines 
simply not connected correctly or the 
DIP jumper is connected upside down. 
When* it works properly, screw the 
enclosure together and use the 
-finished product. 



Table 1: Materials 



Jameca products: 

15 wire ribbon (6"> * ,54 

16 pin DIP sockets (2) .38 
16 pin DIP jumper (24") 3.29 
ALPS keyboard 2.49 

alternative keyboard; 
Hexadecimal keyboard *14.95 K19 



171-15 
16 pin LP 
DJ16-2-16 
KB297040 



Radio Shack product: 
Enclosure 



♦3.95 270-282 



Per-f board scraps 2" x 2" and 1" x 2" 

Bell wire 

Small nuts and bolts (6 pair) 



Table 3: Wiring and Key Arrangement 



Line numb 
Key charac 



3 in the upper half 
ters are in the lower hal-f 



10 14: 2 IS: 2 14: 2 13: 

P « « « 

■ ■ # ■ 

E : 7 : 8 : 9 : 



11 13: 7 15: 7 9: 2 9: 

: I t I 1 12 

X : 4 : 5 : 6 : 
+ + + + 

2 8: 7 8: 7 13: 7 14: 

: : : : ENTER 
: 1:2:3: 



12 : 3 13 



FUNCTION : 



3 14 



D 



E,X,S,D a^re for cursor control 



STANDARD 



Expansi on Deci si ons 



lA 5A 



Table 2: Key Matrix (TI) 



Line on outside. Key on inside 



8 9 



14 1 



1 : 



:P:Y:ENTER:0 : I :U : 



0:6: 



;9 :8 :7 



y. 



A:G:Shi-ft:S 



4 : : ; : H: Space; L 

J 1 -A 1 , 1- ._- 4 


:K 


: J 


5 : :/:N: = : . 




:M 


7 ; Alpha: l:5:Funct:2 
:Lock : : : ; 


: 3 


:4 

M 

-| 


iO: :Q:T;Cntrl:W 

^^'^ ^* ^— ^ ^ ^ ^ ^ ^ *— «^ ^.i ^^ ^ .^ ^ 


:E 


:R 


11: :Z:B: :X 


:C 


:V 



Here i s a questi on we recentl y 
received -from LTC Chris C. Agrafiotis, 
oi Concord, NH: 

"... there seems to be a great 
deal o-f controversy surrounding the 
new Foundation Z80A Card and the 
accompanying 80 Column Card- The big 
question in my mind is .,, o-f what 
practical use is it to me at this time 
to invest *500 more in my TI? What can 
I do with these cards alone without 
spending large sums o-f money in new 
software? Is it necessary to have a 
"true" monitor or can a "composite" do 
the job? and on, and on . . . . " 



These airB certai nl y some good 
questions that Are on the minds o^ 
many TI-99/4A owners- We'll answer ifi 
two parts- We' 1 1 cover the 
-fundamental issues this month and the 
detai 1 s next month - 

One major consider at i on is how 
long you anticipate using the product 
you are considering purchasing. 
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Consider using a business approach^ 
dividing the cost by the anticipated 
life to yield an amortized monthly 
cost, then ask yoursel-f whether that 
■figure is reasonable considering the 
benefits to be derived from the 
product and your current financial 
position- While we cannot anticipate 
how long you will be using your 
T I -99/4 A 5 we can point out some 
factors that might cause you to 
over- or under-esti mate your continued 
use of your TI-99/4A. 

As you know by now, your TI-99/4A 
(al ong wi th al 1 accompany! ng products) 
will still power up every day even 
though Texas Instruments i s no 1 onger 
active in the Home Computer market- 
However, for e>?panded capabi 1 i t i es, 
non -programmers obviously must depend 
on the continuation of the current 
large base of users that is keeping 
software (and hardware) producers in 
busi ness (whi le a number of users 
abandoned the T1-99/4A short 1 y 
TI departed the Home Computer 
Dur sources consi stent 1 y report 
solid base of users at this 
Non-programmers must therefore be 
cautious in their purchases, while 
programmers can take a more 1 iberal 
approach- This is one of the major 
reasons why we place such a strong 
emphasis on programming ski 1 Is- 

You shoul d al so consi der your 
complete system plans, based on 
factors such as your applications and 
the language Cs) you prefer- Also, 
keep in mind that there a.r& more 
products in the works- According to 
preliminary i nf ormat i on we have 
received, within the next few months 
there will likely be four or more 
memory expansion cards available that 
will provide memory in excess of 32K, 
wi th some sport i ng up to 512K of 
memory and some supporting RAMDISK 
(RAM that emulates, or acts like, a 
disk drive, making some appli cations 
much faster) , The new memory 
capabi 1 1 ties should el iminate the 
only remaining significant complaint 
about using the TI-99/4A for very 
serious processing. As an example of 
planning your configuration, an 
Assembly programmer with significant 



after 
field, 
a very 
t i me) - 



word processing requi rements would 
likely want an 80 Column Card and 
512K. On the other hand, owners who 
use mostly commercial game packages 
would likely be very satisfied with a 
standard TI configuration. 

Should a "compatible" become 
available (yes, unconfirmed rumors are 
sti 1 1 f 1 ying) , ex pan si on of your 
TI-99/4A would be greatly enhanced. 
Because of the upward compatibility of 
mac hi ne code for TI processors (this 
does not apply to the TI Professional 
computer, which uses an Intel 
processor), there would be a lot of 
transportable software, which would 
yield benefits both to the compatible 



th 



TI^99/4A 
or may 



users. 

not be 

would be 

expanded 

the 



owners and 
Peripherals may 
compatible, but sharing f i les 
no probl em for owners of 
systems- Additional ly, we 
possibility that if one compatible 
comes along J. more could follow. In 
short, the ef f ecti ve life of your 
TI-99/4A would be greatly extended by 
a compatibl e- 

As for the cost of software for a 
card, the cost will depend primarily 
on the number of cards sold and the 
application for the specific card. 
The Foundation Z80A Card and a card 
produced by Morn ingst ar aire both 

designed for CP/n ' '^' usage (note that 
there are several popular versions of 
CP/M'^^^). A large base of software for 
CP/M ' " already exists, having been 
developed for use on other computers. 
Many publ ic domain programs exist and 
there ^r^ numerous publ i cations on the 
market with programs ready to be keyed 
in. Therefore, software for the Z80A 
Card can be expected to ini tial ly be 
much more readi 1 y avai 1 abl e and at a 
lower cost than software for the SO 
Col umn Card , for exampl e- Of course, 
another way to save money on software 
is to write your own - 

Next month we' 1 1 get into the 
specific claims of Morningstar and 
Foundati on . 
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UsinQ Strings 



STANDARD! lA 9A 

In computer jargon, "strings" a^re 
simply sentences ;i words, letters, or 
other characters- Strings are very 
useful in writing programs. Strings 
can be stored in string var iables- 
The name o-F a string variable always 

"*'^ Here is a BASIC 
sets up a str i ng as a 
and then PRINT'S the 

screen: 



ends wi th the 
program that 
person ' s name 

str i ng on the 



>100 A*="BILL JONES" 
>110 PRINT A4 

As you can see, using the 
variable used -fewer keystrok 

using the enti re name in 1 i 
There are many other advantages 
gained in using string var iabl 



str i ng 

than 

HO. 

to be 



Strings can be i ntroduced i nto 
your program in several ways; through 
use or LINPUT (Extended BASIC only) or 
INPUT -from diskette, cassette tape or 
the screen, -from DATA statements, or 
directly by use of LET (line 100 above 
uses an implied LET. The -ful 1 
statement is LET A*="BILL JONES"*). 

On page 11-99 o-f your TI BASIC 
Re-Ference Manual , you wil 1 -find 
a section titled "Built-in String 
Functions", which references 7 string 
-functions available in console BASIC- 
By using the string functions and 
some other tools avai lable, strings 
can be manipulated -for many useful 
purposes- 
Strings can be combined by using 
the ''S<" (concatenate) operator- Here 
is a simple program ex amp 1 e: 



MOO A*="BILL" 
110 B*=" JONES" 
120 PRINT A*S<" 






X 

^ 






When you RUN the program, you will see 
"BILL JONES" on the screen. 



you can get started in doing almost 
anything you want with a string. 

The -following program will READ 
DATA statements and tell yoa the 
length o-f every person's name: 



> 1 00 
>110 
>120 
>130 
>999 
>1000 
>1010 

> 1 020 
>1030 
>1040 



READ A* 

IF A*=" " THEN 999 

PRINT A*;LEN(A*) 

GOTO 100 

END 

FRANK SMITH 
BILL JONES 
MARY WILLIAMS 
BETH BUHL 



DATA 
DATA 
DATA 
DATA 
DATA 



M 



• I 



li we want to now sort the above 
list by last name, we can change the 
first -few lines and retain lines 
999 through 1040: 



MOO 
>110 



II 



THEN 170 



% 



%'^ 



OPTION BASE 
DIM A*(5) 
>120 N=l 

>130 READ A*(N) 

>140 IF At(N)=" 

>150 N=N+1 

>160 GOTO 130 

>170 FLAG=0 

>180 FOR 1=1 TO N-1 
190 IF SEG*(A*<I),POS(A*(I) , 
" 'M)+l, 1><=SEG*(A*(I + I),pb 
S(A*(I + 1)," ", 1)+1, DTHEN 24 


200 SWITCH*=A«(I) 
>210 A*(I)=A*<I+1) 
>220 At(I+l>=SWITCH* 
>230 FLAG=1 
>240 NEXT I 

>250 IF FLAG=1 THEN 170 
>260 FOR :=1 TO N 

>270 PRINT A*(I) 
>280 NEXT I 

Whew! That's sure a lot more 
advanced than the previous examples. 
In order to get beyond writing simple 
programs, you'll find that you will 
sometimes have to take a quantum leap 
■forward, figuring to pick up a full 
understand! ng through repeatedly usi ng 
your new knowledge. Let's take a look 
at what that last program does. 



Now 



Now 
that 



comes 
you 



th 
und 



really fun part 
tand the basics 



Line 100 merely establi 
there will be no A*(0>, the 



hes that 
start is 
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at A$ ( 1 > . Line 110 allows a maximufn 
o-f 5 items. Lines 120 through 160 
count the number of names to be 

sorted. A sort routine, known as a 
bubble sort J is at 1 ines 170 through 
250. If you are a beginner, you BrB 
not expected to necessarily f ul ly 
understand sorts yet- Just try to be 
able to recognize the bubble sort when 
you see it- Al though the bubb 1 e sort 
is not always the best sort, it is one 
of the shortest and easiest to learn 

sort algorithms- The tricky 1 ine in 
the example is 1 ine 190, whi ch uses 
the SEG* function so that only the 
last name is used in the sort. In 
studying and working wi th 1 i nes such 
as line 190, you may find it useful to 
segregate your thoughts in deal ing 
with the SEG* and the PDS, which is 
imbedded within the SEG*. Lines 260 
through 280 PRINT the sorted list on 
the screen - 



use REDO J INS and <FCTN> 



right 
this: 



arrow) to make the 



<D> (the 
line like 



^■-r 



RUN "DSK1.MYPR06RAM" 

There are al so some sped al 
benefits in using REDO with program 
lines. By entering the previous line 
number and <FCTN> <E> or <FCTN> <X>^ 
followed by REDO (which is <FCTN> 
<8>) , you can edit not only the 
program coding, but also the line 
number and you can also proceed beyond 
the usual fifth line of code. In 
editing the line number, be sure to 
remember that you generate two 1 ines, 
the old one and the edited one, which 
is sometimes a big help and at other 
ti mes a minor burden - 



Using REDO can greatly 
and simpl if y your computing. 



up 



b. r 




If you want to study some very 
innovative uses of strings, refer to 
"Tips from the Tigercub", the monthly 
tips produced by Tiger cub's Jim 
Peterson . Jim is an expert at 
manipulating strings and almost every 
BASIC programmer can learn from his 
examples. 



XTEMDEID BAS I C 



Using REDO 

STANDARD: lA 2A 9A 

REDO is a spec 
Extended BASIC that 
in console BASIC, 



ial f uncti on for 
is not available 



REDO is used to repeat or edit 
the 1 ine most recently entered. The 
Extended BASIC manual does not point 
out that the line does not necessarily 
have to be a program line- For 
example, key in: 

RUN DSKl-MYPROGRAM 



Extended BASIC gives an error b 
the f i le requested must be enclo 
quotes when using RUN. Inste 
keying the entire line over, yo 
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Di sk Sector Address! nQ 

STANDARD; lA 2C 4B 5A 6B 7A 9A 

Last month we indicated we would 
begin discussing file construction 
this month. In the meantime, we 
received a routine from a reader that 
ties in with the topic of files. So, 
before actually going into the files, 
we' 11 gi ve you advanced users the 
opportunity to look at everything on 
your disk directly, which should help 
you to better understand your files, 

William C- Peregrin, of 
Cincinnati , Ohio, wrote saying that 
thanks to information in the FORTH 
source code and Computer Shopper "'^^, he 
was able to write a program that 
accesses a TI disk by sector, instead 
of by file as is normally done. 







Mr. 


Peregrin offered the 






f ol lowing 


information about the 






program. 




ecause 








sed in 




Once 


the control block is set up 


ad of 




starting 


at >834A, just update the 


u can 




word value at >S350 with the sector 


v^ 
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if 



mil 






I 
J 



that you want to read. To write a sector, change the byte value at >834D to a 
zero. To access a di-fferent drive, change the byte value at >834C to the 
drive that you want to access. The word value contained at >834E is a 
pointer to the location in VDP RAM that contains the 256 byte buffer for the 
data that is written to or read from the disk. This routine always transfers 
256 bytes (one sector is 256 bytes). 



Once a read/write operation is completed, the status is 

location >8350 and the sector accessed is (a word value) returned 
>834A. 



returned in 
in location 



sub 



Continual reads or writes can be performed by making the following code 
routine and executing a BL dnamet 



name 



EQU 
LI 



R1,PAB 



MOV Rl,(a>8356 
BLWP QDSRLNK 
DATA >A 
RT 



POINTER TO SUBPROGRAM NAME LENGTH 
IN THIS CASE VDP ADDRESS >FBO 
THIS ADDRESS IS USED BY THE DSR 

USED TO INDICATE A SUBPROGRAM 
RETURN 



The sector address 
operat i on is performed. 



O8350) must be updated before each read/ write 



As a very simple example of how to use the routine, we^"!! now describe how 
to read the first disk sector, which includes the name of the disk, directly 
from the screen. Change the VDP ADDRESS FOR SECTOR, sometimes known as the PAB 
buffer, from >1000 to >0000, which is the beginning of the Screen Image Table. 
Note that this will not always give you ASCII code that is readable from the 
screen, but it will allow you to read the name of the disk. Add the following 
lines in the space designated in the source listing as YOUR PROGRAM: 

**ttttt****ttt*t 

t YOUR PROGRAM * 

t$*tttt**ttt**tt**t*t***tt* 

KEY CLR eSTAT AWAIT PRESSING A KEY 

BLWP QKSCAN SO THAT SCREEN CAN BE 

MOV (slSTAT,@STAT READ BEFORE PROGRAM 

JEQ KEY ENDS 



Here is the complete source listing: 

» UPDATER - JANUARY 4, 1985 « 
« BY WILLIAM C. PEREGRIN # 
* CINCINNATI, OHIO « 



PAB 
FAC 

3UBPTR 

STAT 
READ 

UNIT 
« 



DEF 

REF 
EQU 
EQU 

EQU 
EQU 

DATA 

BYTE 



SECTOR 

DSRLNK, VSBW, VMBW, KSCAN 
>F80 

>834A 

>8356 
>837C 

SECTOR 

1 UNIT # 



# READ OR WRITTEN 

12 3 

4 FOR CORCOMP 
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RORW 
« 



BYTE >FF 



DATA >1000 
DATA O 



READ OR WRITE 



* 

SROM 

MYREG 



DATA >0110 



SECTOR 



B5S 

MOV 

LWPI 

LI 

LI 

LI 



SETUP 



* YOUR 

* Inse 



R11,@RTREG 

MYREG 

RO , PAB 

R1,SR0W 
LI R2,2 
BLWP evMBW 
LI R3,8 
LI RljREAD 
LI R2,FAC 
MOVE «Ri+,*R2+ 
DEC R3 
JNE 
LI 
MOV 
BLWP 
DATA ^r, 

PROGRAM 

t your own coding 



h:,3 

SETUP 

R1,PAB 

R1,@SUBPTR 

eDSRLNK 

>A 



RO 
RO,@STAT 



CLR 

MOVB 

LWPI >B3E0 

MOV @RTREG,R11 

RT 

END 



WRITE ~ O 

VDP ADDRESS FOR SECTOR 

SECTOR » TO READ OR WRITE 

STORED AT >a350 

CONTAINS ERROR CODE ON RETURN 
SUBPROGRAM NAME LENGTH AND NAME 
WORK AREA 
Rll SAVE AREA 



FETCH VDP RAM ADDRESS 

FETCH POINTER TO READ/WRITE 

NUMBER OF BYTES 

WRITE TO VDP RAM 

LOAD BYTE COUNT 

FETCH POINTER TO CONTROL BLOCK 

FETCH POINTER TO CPU RAM 

MOVE A BYTE OF DATA 

DECREASE BYTE COUNT 

JUMP IF NOT FINISHED 

FETCH POINTER TO VDP 

STORE TO NAME LENGTH 

DO A DSR 

SUBPROGRAM IDENTIFIER 



RAM 
POINTER 



s in this area be-fore assembling to object code 

CLEAR RO 

CLEAR STATUS FLAG 
FETCH CPU WORK AREA 
RESTORE RU 

RETURN 



.. . ^^is Above direct sector addressing routine could be used to repair 
that Are blown (but normally not physically damaged disks) ■ to identi-fy 

2i®li^u'^"^*M'"fi?^^"^^^?®' ^I?^ *^° investigate the structure of the header 

L disks. We'll try to return to this routine in a future issue with 
advanced programs -for performing some of the above-mentioned operations. 



disks 
the 
tors 



uJFiri 
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Value File Form Letters 



By Charles M. Robertson 

Lake Charles, Louisiana 



STANDARD: 



lA 2E 4B 5A 6A 
7A 9A 



and a 
is also 

can be 

computer 

world" 

computer 

elle, a 

capture 
irit in 
ectronic 



Computer literacy is not just knowing the difference between a bit 
byte, a disk and a desk. In its broadest sense, computer literacy 
knowing what can be done with a computer- In theory, anything that 
described in sufficient detail to be modeled can be performed by a 
with suitable interfaces and peripherals. Making the leap from "real 
problems to solutions by computer is the true challenge of achieving 
literacy. These ideas, paraphrased from the writings of Jerry Pourn 
science and science fiction author and computer magazine editor, best 
the spirit with which I like to approach the keyboard. With this sp 
mind, I began to wonder how I could expand the use of Tl-Writer from el 
typewriter and word jiggler to my "lazy man's definition" of word pr 
something that processes words so I don't have to! 

=.„ c^^^^^ assisting a client that I consult for set up a computer system in 
S™= ^^^'^°' ^ began to compare the features of TX-Writer with the word 
dTfforSi^2«P'^°^;;iH'" ^^f *=1 lent had already purchased. I noted, among other 
wis ^nEStlAi-f.??S"'^H^^^'^°''°t""3 f^P^SJ °^ Tl-Writer in which the other program 

the vai^5« ??l^i ^^iy*. "^^fi^'^K^ j: ^" *^^ ""^^^ '"^'^^e option of Tl-Wr iter the 
the value file (often thought of as a name and address or "mail" list) can 
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contain up to 100 variables o-f up to 77 columns each, in each file' The wheels 
began to spin. 

I work as a psychotherapist -for a community health clinic and enjoy 
everything about my job except paperwork. I doubt that I am unique in this 
aspect of job satisfaction. I frequently must prepare case summaries for 
transfers, case closures, letters to other agencies and even documents for our 
own data processing department for keying into the dumb-terminal that is part 
of the network that ties the state's clinics together. This would be tedious 
enough, but it became maddening when I realized how many times I was sending 
essentially the same information, in many different forms, for one client. The 
solution was to establish a "data base file" for each client, utilizing the 
merge option of Tl-Writer. 

I began by examining the documents I had been preparing for data they had 
in common. After selecting the items for my "fields", I determined a way of 
wording the data at entry that would allow it to fit into several different 
contexts m the different documents it would be merged with. Most awkward 
sentences could be reworked in the "form letter" to utilize the data as worded 
in the value file for insertion. The final step was to set up my value file 
with prompts for required formats, such as double spacing on the social 
security number to fit the blocks on some forms I would be printing on and 
preceeding words in the "form letter". 

An asterisk marks the end of the record for the mail merge program and the 
next record would begin below. The numbers preceding each data field 
identify this field for entry into text. Optional lines can be used when the 
destination document is printed in either "adjust, fill" or "no-adjust, 
no-fill". In the first case, a blank entry is ignored and text wraps to the 
next field so items that must be longer than 77 characters can be entered by 
sequentially dedicating fields to them. In the latter case, a null line may be 
entered into text if no data is present, 

A sample of patient data, once entered into the record is reproduced below 
(patient data is fictitious). 

1 06 24 83 

2 12 11 84 

3 12 27 84 

4 36 year old white male 

5 "I was having problems with the job... I started seeing differences in things". 

6 The Pt. apparently developed Sxs. of paranoia which led to conflict at work. 

7 a rather heavy use of marijuana prior to onset. 
8 

9 hostility, denial, and suspiciousness were noted. Depression was also present. 

H Eh-35, TP-30, PB-30, RP-30. 

12 his denial of Sxs., compliance with treatment, and drug education. 

14 3 times after intake and currently. 

15 "Closure is being processed at this time ; " 

JS »?^^^*^, ^^*F^P^P^^his illness, denied drugs, and demonstrated fair remission. 

17 "The closing LCAR ratings are " 

18 OPTIONAL LINE 

19 SCHIZOPHRENIFORM DISORDER 

20 2 9 5 .4 

21 NONE 

22 V 7 1 .0 9 

23 SAME 

24 SAME 

25 SAME 

26 SAME 

27 JOHN DOE 
2 2 



29 888 77 6666 

30 2 

31 9 9 

32 1 5 



^-7 ry 



Wm I 



jC d 



34 1 5 
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35 3 O 

36 3 5 

37 3 O 

38 2 O 

39 3 O 

40 1 5 

41 D2-2-PA #1 

51 2120 ANYSTREETNAME 

52 LAKE CHARLES, LA 70605 
* 

Thi s data i s merged i nto any o-f several ex i sti ng form letters and 
documents. I have created and saved to disk with these -files. A particular 
record is selected by answering "Y" to the MAILING LIST question in TEXT 
FORMATTER and selecting the desired record (s) in response to WHICH LETTERS?, 
Incidentally, each file holds fifteen such records and I have room on a SS/SD 
disk for three such files and the six documents I merge them with. Data item 
41 holds the disk, file, and record number for each patient and is reported as 
Mail List name and "page" number when Tl-Writer prompts for this data in 
in preparation to print. Files can be searched by, any field in Editor mode 
through use of the FIND STRING command, A sample of one of the documents my 
computer now prepares for me (so I don't have to) is shown below. 

,LM 7;RM 73; SP 5; PL 55; FO 
.DP 99: ENTER DATE: s DP 
98:CITY/STATE/ZIP;DP 97:ST. 
ADDRESS?; DP 96: LETTER TO? .DP 
42:0PTI0NAL LINE(28);DP 43:0PTI0NAL 
LINE(28) .DP 44:0PTI0NAL LINE;DP 
45: OPTIONAL LINE ,CE'^-f. 



»99«^>^ 
• SP 4<^^ 



F=^ 



«96«-F. 
«97«<^R 

«98«'^Fv 

c:: 



SP 2"R 



Re: «27*':>. 
*29«'^^.- 



SP 2-^. 






Gentlemen: -f^ 



^,.^ 



.SP 3;AD;FI; IN +5 
The above captioned entered our clinic 
*1* with a complaint oi t5t tht 
Contributing -factors were *7« And, 
symptoms o-f t9t^^r-< 
The client was assigned to the 
Short-Term Treatment unit and seen 
*14» Treatment has focused on *12« The 
di agnosi s at admi ssi on was tl^t DSM 



III code:«20*"R 



tij 



«42* «43* «44* *45* -f. 



c: 



SP 2' r. 

IN 7;NA;NF 



ci: 



^\ 



Sincerely, 

CHARLES M, ROBERTSON, HSW III'V. 

The use of DEFINE PROMPT allows me to "customize" each letter at print 
time to answer unforeseen questions or make special recommendations, 

This is my idea of word processing! You should hear the grumbles from my 
co-workers as I applaud the arrival of each new request for information I 
receive! What was once written over and over in a dozen different ways is now 
only written once (by me, that is). 

In a future article, I will share a program in Extended BASIC that allows 
me to create these files on my unexpanded console at work when I have taken the 
Peripheral Expansion Box home for more fun projects. 



— > 
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News, Corrections, Updat 



f=-OUJF%:F^ X 

, Editorials, Kudos, and Come-what-rnay 



CORRECTIONS: 



DECEMBER: Well, we hope to -finally 
get this one right. On page 8, the 
Extended BASIC test program, lines 
140, 200 and 260, the ends of the 
lines should read "#768)" instead 
of "8) '*. Sorry, but our January 
correction was wrong, too. 



JANUARY; In "Solitaire Check 

3, line 1170 should 

("STEP 2" was omi 
FOR 1=8 TO 22 STEP 2 



II 



on 



>1170 



read 
): 



game reviews, spreadsheetmg, and word 
processinQ., We' 1 1 be sure to cover 
these topics in upcoming issues. 



COMING IN MARCH: 
Game review ■ 

Important Multiplan"'^'^ tips! 
More T I — Wr i ter di scover i es ! 
Tips on writing graphics programs! 

Information on the new CP/M^" cards! 



-found no 

to -fully 

The score 

the pixel 

-from the 



In the FORTH article, we 

errors, but we -f ai led 

explain the scori ng. 

represents the square of 

distance o-f one shot 

target, as i-f each shot were a new 

game, with the better score being 

the lower score (best is 1). Also, 

we did not list the dash options to 

be used , wh i ch were -GRAPH and 

-GRAPHl. 



In the Tl-Writer article, 

the FIX/80 -file can b 
directly from Extended 
output file to Tl'Writer's 
thus retaining control char 



In the future, we promiee to use th 
computer more in assisting editing! 



7, 

read 

BASIC'S 

Editor, 

ters. 



This issue represents a 
from our typical issue. Thi 
to be considered a change in 
We simply had more ad van 
special material avai lable th 
and many readers were request 
advanced topics- Me haven't f 
the beginners ! Next month 
return to our normal wide 
subject matter- Our recent 
been in favor of beginner 
program listings, children's p 



rture 
s is not 

policy ! 
ced and 
an usual 
ing more 
orgotten 
we will 
range of 
mail has 

topics, 
rograms, 



Amerisof t has recent 1 
several very promising pr 
programs include a compi 1 
Assembly program that links 
Assembler BASIC, Extended 
Mini Memory BASIC for plotte 
that can be dumped to a pri 
version only) , a "paintin 
with printer dump, and a "3- 
f or rotating objects on 
Most of the major whol 
handl ing the programs, wh 
be avai 1 abl e through most d 



y released 
ams. The 
(!), an 
to Editor/ 
BASIC, or 
d graphics 
nter (disk 
g" program 
D" program 
3 planes, 
alers arB 
ich should 
lers. 



IMPORTANT NOTICE: Now that we have 
r el eased a number of i ssues, we have 
discontinued our pol icy of 
automatical ly beginning subscriptions 
with Volume 1, Issue 1 (Sept. '84). 
If you ars a new subscriber and would 
1 i ke to receive back issues, just drop 
us a line and we' 11 change the 
beginning month of your subscription 
to any previous month 
Li nee we often reference 
and we have offered a lot 
i nf ormat i on , we' re sure 



you desire- 
back issues 
of valuable 
most of you 



wil 1 want the previous issues. Allow 
one to three weeks for receiving your 
copies- If you have any requests for 
topics, please write, as we make every 
possible effort to provide the type of 
information being requested. 



Multiplan is a r 
Computer Shopper 
CP/M is a regist 



istered trademark of Microsoft Corp- 
is a registered trademark of Patch Publishing Co., 
ed trademark of Digital Research Corp- 
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contribution to this issue and the 
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